;;; set-tabbar.el - settins for tabbar.
;;;  
;;; Copyright (C) 2011 Jeffy Du
;;;  
;;; Author: Jeffy Du (cmdxiaoha@163.com)
;;; Create: 2011-12-23 23:44:10
;;; Last Modified: 2011-12-23 23:44:19
;;;  
;;; History:
;;; --------
;;; 2011-12-23  v0.1  Jeffy Du (cmdxiaoha@163.com)
;;;     1. Initial revision.

(require 'tabbar)
(tabbar-mode 1)

;; Key bindings.
(global-set-key (kbd "C-<up>") 'tabbar-backward-group)
(global-set-key (kbd "C-<down>") 'tabbar-forward-group)
(global-set-key (kbd "C-<left>") 'tabbar-backward-tab)
(global-set-key (kbd "C-<right>") 'tabbar-forward-tab)

;; Fase settings.
(set-face-attribute 'tabbar-default-face nil  
                    :inherit 'tabbar-default
                    :background "gray80"  
                    :foreground "gray30"
                    :height 1.0
)

(set-face-attribute 'tabbar-button-face nil  
                    :inherit 'tabbar-default  
                    :box '(:line-width 2 :color "DarkGrey")
                    :background "Grey"
)

(set-face-attribute 'tabbar-selected-face nil  
                    :inherit 'tabbar-default  
                    :box '(:line-width 2 :color "DarkGoldenrod")  
                    :background "LightGoldenrod"  
                    :foreground "DarkGreen"
                    :weight 'bold
)

(set-face-attribute 'tabbar-unselected-face nil  
                    :inherit 'tabbar-default  
                    :box '(:line-width 2 :color "DarkGrey")
                    :background "LightGrey"  
                    :foreground "Black"
)
